Fortran 过程指针

指向过程的指针有同样的调用顺序（需要显式接口）：

procedure(sub1), pointer :: p => null()

则通过调用指针来调用过程，同时如果有另一个过程 sub2 有同样的接口，那么也可以调用。